Chip 2004 December/2004-12 CHIP.iso/Internet/The Bat! Professional 3.01/thebat_professional.msi/Data1.cab/thebat.exe/0/RCDATA/TFOLDEREDITOR/TFOLDEREDITOR.txt

Text File | 2004-10-12 | 28KB | 1,128 lines

object FolderEditor: TFolderEditor
  Left = 383
  Top = 241
  HelpContext = 10025
  BorderIcons = [biSystemMenu]
  BorderStyle = bsDialog
  BorderWidth = 4
  Caption = 'Edit Folder'
  ClientHeight = 417
  ClientWidth = 500
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  KeyPreview = True
  OldCreateOrder = True
  Position = poScreenCenter
  OnActivate = FormActivate
  OnClose = FormClose
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnKeyDown = FormKeyDown
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object btOK: TButton
    Left = 199
    Top = 392
    Width = 90
    Height = 25
    Caption = '&OK'
    Default = True
    ModalResult = 1
    TabOrder = 1
  end
  object bCancel: TButton
    Left = 299
    Top = 392
    Width = 90
    Height = 25
    Cancel = True
    Caption = 'Cancel'
    ModalResult = 2
    TabOrder = 2
  end
  object bMacro: TButton
    Left = 12
    Top = 392
    Width = 169
    Height = 25
    Caption = '&Macros...'
    Enabled = False
    TabOrder = 3
    Visible = False
    OnClick = bMacroClick
  end
  object bHelp: TButton
    Left = 399
    Top = 392
    Width = 88
    Height = 25
    Caption = 'Help'
    TabOrder = 4
    OnClick = bHelpClick
  end
  object Book: TPageControl
    Left = 0
    Top = 0
    Width = 500
    Height = 381
    ActivePage = tsGeneral
    Align = alTop
    TabOrder = 0
    TabStop = False
    OnChange = BookChange
    object tsGeneral: TTabSheet
      Caption = 'General'
      object Label1: TLabel
        Left = 10
        Top = 10
        Width = 31
        Height = 13
        Caption = '&Name:'
        FocusControl = eName
      end
      object OptBook: TNotebook
        Left = 4
        Top = 48
        Width = 489
        Height = 305
        TabOrder = 1
        object TPage
          Left = 0
          Top = 0
          Caption = 'Default'
          object lImapSync: TLabel
            Left = 54
            Top = 68
            Width = 107
            Height = 13
            Alignment = taRightJustify
            Caption = '&Synchronisation mode:'
          end
          object lbBaseName: TLabel
            Left = 16
            Top = 172
            Width = 147
            Height = 13
            Caption = 'Full cache message base path:'
          end
          object lbImapName: TLabel
            Left = 16
            Top = 132
            Width = 101
            Height = 13
            Caption = 'Full IMAP folder path:'
          end
          object Label13: TLabel
            Left = 84
            Top = 224
            Width = 77
            Height = 13
            Alignment = taRightJustify
            Caption = 'Column settings:'
          end
          object cbImapTicker: TCheckBox
            Left = 16
            Top = 16
            Width = 433
            Height = 17
            Caption = 'Show unread messages on Mail&Ticker(tm)'
            TabOrder = 0
          end
          object cbImapPrinter: TCheckBox
            Left = 16
            Top = 40
            Width = 433
            Height = 17
            Caption = 'Use &folder-specific print settings'
            TabOrder = 1
          end
          object cbImapSync: TComboBox
            Left = 168
            Top = 66
            Width = 281
            Height = 21
            Style = csDropDownList
            ItemHeight = 13
            TabOrder = 2
            Items.Strings = (
              'Don'#39't synchronise'
              'Headers only'
              'New headers only'
              'Headers and text'
              'New headers and text'
              'Full synchronise'
              'New messages only')
          end
          object cbImapFlushCache: TCheckBox
            Left = 16
            Top = 100
            Width = 249
            Height = 17
            Caption = '&Clear cached messages on exit'
            TabOrder = 3
          end
          object bFlushImap: TButton
            Left = 272
            Top = 96
            Width = 176
            Height = 25
            Caption = 'Clear cache no&w'
            TabOrder = 4
            OnClick = bFlushImapClick
          end
          object eImapName: TEdit
            Left = 16
            Top = 144
            Width = 393
            Height = 19
            BorderStyle = bsNone
            Ctl3D = False
            ParentColor = True
            ParentCtl3D = False
            ReadOnly = True
            TabOrder = 5
          end
          object eBaseName: TEdit
            Left = 16
            Top = 188
            Width = 449
            Height = 19
            BorderStyle = bsNone
            Ctl3D = False
            ParentColor = True
            ParentCtl3D = False
            ReadOnly = True
            TabOrder = 6
          end
          object cobImapColumnsType: TComboBox
            Tag = 1
            Left = 168
            Top = 220
            Width = 281
            Height = 21
            Style = csDropDownList
            ItemHeight = 13
            ItemIndex = 0
            TabOrder = 7
            Text = 'Use the account default column settings'
            OnChange = cobImapColumnsTypeChange
            Items.Strings = (
              'Use the account default column settings'
              'Use parent folder column settings'
              'Use view mode'
              'Use folder own settings')
          end
          object btnImapDistribute: TButton
            Left = 32
            Top = 252
            Width = 121
            Height = 25
            Caption = 'Copy to ...'
            TabOrder = 8
            OnClick = btnDistributeClick
          end
          object btnImapEditVM: TButton
            Left = 168
            Top = 252
            Width = 280
            Height = 25
            Caption = 'Edit View Mode'
            Enabled = False
            TabOrder = 9
            OnClick = btnEditVMClick
          end
        end
        object TPage
          Left = 0
          Top = 0
          Caption = 'Imap'
          object gbOptions: TGroupBox
            Left = 4
            Top = 0
            Width = 469
            Height = 301
            Caption = 'Options'
            TabOrder = 0
            object lHomeDir: TLabel
              Left = 76
              Top = 24
              Width = 45
              Height = 13
              Alignment = taRightJustify
              Caption = '&Directory:'
              FocusControl = bHomeDir
            end
            object Label12: TLabel
              Left = 88
              Top = 236
              Width = 77
              Height = 13
              Alignment = taRightJustify
              Caption = 'Column settings:'
            end
            object eHomeDir: TEdit
              Left = 132
              Top = 20
              Width = 309
              Height = 21
              Color = clBtnFace
              ReadOnly = True
              TabOrder = 0
            end
            object bHomeDir: TButton
              Left = 176
              Top = 46
              Width = 129
              Height = 25
              Caption = 'Browse'
              TabOrder = 1
              OnClick = bHomeDirClick
            end
            object bClearHome: TButton
              Left = 312
              Top = 46
              Width = 129
              Height = 25
              Caption = 'Clear'
              TabOrder = 2
              OnClick = bClearHomeClick
            end
            object eMaxMsgs: TXSpinEdit
              Left = 328
              Top = 124
              Width = 57
              Height = 21
              TabOrder = 6
              Text = '0'
              MinValue = 0
              MaxValue = 100000
              Value = 0
              Step = 1
            end
            object eMaxDays: TXSpinEdit
              Left = 328
              Top = 148
              Width = 57
              Height = 21
              TabOrder = 8
              Text = '0'
              MinValue = 0
              MaxValue = 100000
              Value = 0
              Step = 1
            end
            object GroupBox2: TGroupBox
              Left = 16
              Top = 176
              Width = 433
              Height = 45
              Caption = 'On exit'
              TabOrder = 9
              object cbPurge: TCheckBox
                Left = 16
                Top = 18
                Width = 177
                Height = 17
                Caption = '&Remove old messages'
                TabOrder = 0
              end
              object cbCompress: TCheckBox
                Left = 224
                Top = 18
                Width = 169
                Height = 17
                Caption = '&Compress the folder'
                TabOrder = 1
              end
            end
            object cbKeepMsgs: TCheckBox
              Left = 16
              Top = 128
              Width = 297
              Height = 17
              Caption = '&Maximum number of stored messages is'
              TabOrder = 5
              OnClick = cbKeepMsgsClick
            end
            object cbKeepDays: TCheckBox
              Left = 16
              Top = 150
              Width = 297
              Height = 17
              Caption = '&Keep messages in the base for (days) :'
              TabOrder = 7
              OnClick = cbKeepDaysClick
            end
            object cbOKTicker: TCheckBox
              Left = 16
              Top = 80
              Width = 289
              Height = 17
              Caption = '&Show unread messages on MailTicker(tm)'
              TabOrder = 3
            end
            object cbUsePrnCtl: TCheckBox
              Left = 16
              Top = 100
              Width = 361
              Height = 17
              Caption = 'Use &folder-specific print settings'
              TabOrder = 4
            end
            object cobColumnsType: TComboBox
              Left = 168
              Top = 232
              Width = 281
              Height = 21
              Style = csDropDownList
              ItemHeight = 13
              TabOrder = 10
              OnChange = cobImapColumnsTypeChange
              Items.Strings = (
                'Use the account default column settings'
                'Use parent folder column settings'
                'Use view mode'
                'Use folder specific settings')
            end
            object btnDistribute: TButton
              Left = 16
              Top = 264
              Width = 129
              Height = 25
              Caption = 'Copy to ...'
              TabOrder = 11
              OnClick = btnDistributeClick
            end
            object btnEditVM: TButton
              Left = 168
              Top = 264
              Width = 281
              Height = 25
              Caption = 'Edit View Mode'
              Enabled = False
              TabOrder = 12
              OnClick = btnEditVMClick
            end
          end
        end
      end
      object eName: TEdit
        Left = 8
        Top = 26
        Width = 465
        Height = 21
        TabOrder = 0
      end
    end
    object tsFilter: TTabSheet
      Caption = 'Filter'
      ImageIndex = 9
      inline cfFilter: TConditionFrame
        Left = 184
        Top = 60
        Width = 291
        Height = 285
        TabOrder = 0
        inherited pnButtons: TPanel
          Top = 262
          Width = 291
        end
        inherited pnIF: TPanel
          Width = 291
          Height = 262
          inherited sbIF: TScrollBox
            Width = 287
            Height = 258
          end
        end
      end
      object cbUseFilter: TCheckBox
        Left = 184
        Top = 28
        Width = 301
        Height = 17
        Hint = 'Check for using not trivial filters'
        Caption = 'Advanced &filter settings'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
        OnClick = cbUseFilterClick
      end
      object cbFastSearch: TCheckBox
        Left = 8
        Top = 56
        Width = 165
        Height = 17
        Hint = 'Checking and selecting needing flags can improve performance'
        Caption = 'Use f&ast search:'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 2
        OnClick = cbFastSearchClick
      end
      object gbFastSearch: TGroupBox
        Left = 24
        Top = 76
        Width = 157
        Height = 269
        Caption = 'Fast search &types:'
        TabOrder = 3
        object cbUnread: TCheckBox
          Left = 8
          Top = 20
          Width = 144
          Height = 17
          Caption = '&Unread'
          TabOrder = 0
        end
        object cbParked: TCheckBox
          Left = 8
          Top = 44
          Width = 144
          Height = 17
          Caption = '&Parked'
          TabOrder = 1
        end
        object cbFlagged: TCheckBox
          Left = 8
          Top = 72
          Width = 144
          Height = 17
          Caption = 'Fla&gged'
          TabOrder = 2
        end
        object cbNotReplied: TCheckBox
          Left = 8
          Top = 100
          Width = 144
          Height = 17
          Caption = '&Not replied'
          TabOrder = 3
        end
        object cbAttachments: TCheckBox
          Left = 8
          Top = 124
          Width = 144
          Height = 17
          Caption = 'A&ttachments'
          TabOrder = 4
        end
      end
      object btnWiz: TButton
        Left = 196
        Top = 324
        Width = 75
        Height = 25
        Caption = 'Wiz'
        TabOrder = 4
        Visible = False
        OnClick = btnWizClick
      end
      object cbAutoSync: TCheckBox
        Left = 8
        Top = 8
        Width = 173
        Height = 17
        Hint =
          'Unchecked means you must update folder manually. Checking may ca' +
          'use program slowdown'
        Caption = 'Auto &refresh'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 5
      end
      object cbSaveState: TCheckBox
        Left = 184
        Top = 8
        Width = 293
        Height = 17
        Caption = 'Store state bet&ween sessions'
        TabOrder = 6
      end
      object cbUseCounters: TCheckBox
        Left = 8
        Top = 32
        Width = 165
        Height = 17
        Caption = 'Count in upper level'
        TabOrder = 7
      end
    end
    object tsTemplate: TTabSheet
      Caption = 'Template'
      ImageIndex = 1
      object Label4: TLabel
        Left = 8
        Top = 8
        Width = 89
        Height = 13
        Caption = '&Message template:'
        FocusControl = eTemplate
      end
      object eTemplate: TMemo
        Left = 8
        Top = 24
        Width = 449
        Height = 313
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Courier New'
        Font.Style = []
        ParentFont = False
        PopupMenu = mPop
        ScrollBars = ssBoth
        TabOrder = 0
        WordWrap = False
        OnClick = eTemplateEnter
        OnEnter = eTemplateEnter
      end
    end
    object tsReply: TTabSheet
      Caption = 'Reply'
      ImageIndex = 2
      object Label6: TLabel
        Left = 8
        Top = 8
        Width = 118
        Height = 13
        Caption = '&Reply message template:'
      end
      object eRTemplate: TMemo
        Left = 8
        Top = 24
        Width = 449
        Height = 313
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Courier New'
        Font.Style = []
        ParentFont = False
        PopupMenu = mPop
        ScrollBars = ssBoth
        TabOrder = 0
        WordWrap = False
        OnClick = eTemplateEnter
        OnEnter = eTemplateEnter
      end
    end
    object tsForward: TTabSheet
      Caption = 'Forward'
      ImageIndex = 3
      object Label7: TLabel
        Left = 8
        Top = 8
        Width = 141
        Height = 13
        Caption = '&Message forwarding template:'
        FocusControl = eFTemplate
      end
      object eFTemplate: TMemo
        Left = 8
        Top = 24
        Width = 449
        Height = 313
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Courier New'
        Font.Style = []
        ParentFont = False
        PopupMenu = mPop
        ScrollBars = ssBoth
        TabOrder = 0
        WordWrap = False
        OnClick = eTemplateEnter
        OnEnter = eTemplateEnter
      end
    end
    object tsConfirm: TTabSheet
      Caption = 'Confirmation'
      ImageIndex = 4
      object lRCRTpl: TLabel
        Left = 8
        Top = 120
        Width = 47
        Height = 13
        Caption = '&Template:'
      end
      object cbRCR: TCheckBox
        Left = 16
        Top = 8
        Width = 385
        Height = 17
        Caption = 'O&verride account'#39's Reading Confirmation settings'
        TabOrder = 0
        OnClick = cbRCRClick
      end
      object cbRCRPrompt: TCheckBox
        Left = 16
        Top = 28
        Width = 385
        Height = 17
        Caption = 'Prompt before the &Action'
        TabOrder = 1
      end
      object rgRCRaction: TRadioGroup
        Left = 8
        Top = 56
        Width = 441
        Height = 57
        Caption = 'Action'
        Columns = 2
        ItemIndex = 0
        Items.Strings = (
          '&Put in Outbox'
          '&Send immediately'
          '&Edit'
          '&Ignore')
        TabOrder = 2
      end
      object eConfirm: TMemo
        Left = 8
        Top = 136
        Width = 449
        Height = 201
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Courier New'
        Font.Style = []
        ParentFont = False
        PopupMenu = mPop
        ScrollBars = ssBoth
        TabOrder = 3
        OnEnter = eTemplateEnter
      end
    end
    object tsSound: TTabSheet
      Caption = 'Sound'
      ImageIndex = 5
      object cbSound: TRadioGroup
        Left = 16
        Top = 8
        Width = 433
        Height = 89
        Caption = 'Sound when new mail arrived'
        ItemIndex = 0
        Items.Strings = (
          'Use &Account settings'
          '&Use own sound settings'
          '&Sound disabled')
        TabOrder = 0
        OnClick = cbSoundClick
      end
      object gbSound: TGroupBox
        Left = 16
        Top = 104
        Width = 433
        Height = 137
        Caption = 'Settings'
        TabOrder = 1
        object Label9: TLabel
          Left = 8
          Top = 28
          Width = 19
          Height = 13
          Caption = '&File:'
          FocusControl = eSound
        end
        object eSound: TEdit
          Left = 48
          Top = 24
          Width = 369
          Height = 21
          TabOrder = 0
        end
        object bBrowseWAV: TButton
          Left = 200
          Top = 56
          Width = 107
          Height = 25
          Caption = '&Browse...'
          TabOrder = 1
          OnClick = bBrowseWAVClick
        end
        object bTestSound: TButton
          Left = 320
          Top = 56
          Width = 99
          Height = 25
          Caption = '&Test now'
          TabOrder = 2
          OnClick = bTestSoundClick
        end
        object cbOwnTime: TCheckBox
          Left = 8
          Top = 104
          Width = 285
          Height = 17
          Caption = '&Override account'#39's allowance interval:'
          TabOrder = 3
          OnClick = cbOwnTimeClick
        end
        object eInterval: TTimeIntervalEdit
          Left = 328
          Top = 102
          Width = 89
          Height = 21
          EditMask = '##:##-##:##;1;0'
          MaxLength = 11
          TabOrder = 4
          Text = '  :  -  :  '
        end
      end
    end
    object tsIdentity: TTabSheet
      Caption = 'Identity'
      ImageIndex = 6
      object GroupBox1: TGroupBox
        Left = 13
        Top = 8
        Width = 396
        Height = 97
        Caption = 'From information'
        TabOrder = 0
        object Label2: TLabel
          Left = 16
          Top = 20
          Width = 57
          Height = 13
          Caption = '&From Name:'
        end
        object Label3: TLabel
          Left = 16
          Top = 44
          Width = 67
          Height = 13
          Caption = 'From &Address:'
        end
        object Label8: TLabel
          Left = 16
          Top = 68
          Width = 62
          Height = 13
          Caption = '&Organisation:'
        end
        object eFromName: TComboBox
          Left = 104
          Top = 16
          Width = 284
          Height = 21
          ItemHeight = 0
          TabOrder = 0
        end
        object eFromAddr: TComboBox
          Left = 104
          Top = 40
          Width = 284
          Height = 21
          ItemHeight = 0
          TabOrder = 1
        end
        object eOrg: TComboBox
          Left = 104
          Top = 64
          Width = 284
          Height = 21
          ItemHeight = 0
          TabOrder = 2
        end
      end
      object GroupBox3: TGroupBox
        Left = 13
        Top = 112
        Width = 396
        Height = 73
        Caption = 'Reply-To information'
        TabOrder = 1
        object Label10: TLabel
          Left = 16
          Top = 44
          Width = 87
          Height = 13
          Caption = 'Reply-To A&ddress:'
        end
        object Label11: TLabel
          Left = 16
          Top = 20
          Width = 77
          Height = 13
          Caption = '&Reply-To Name:'
        end
        object eReplyName: TComboBox
          Left = 120
          Top = 16
          Width = 268
          Height = 21
          ItemHeight = 0
          TabOrder = 0
        end
        object eReplyAddr: TComboBox
          Left = 120
          Top = 40
          Width = 268
          Height = 21
          ItemHeight = 0
          TabOrder = 1
        end
      end
    end
    object tsDelete: TTabSheet
      Caption = 'Deletion'
      ImageIndex = 8
      OnEnter = tsDeleteEnter
      object gbNormalDel: TGroupBox
        Left = 16
        Top = 32
        Width = 433
        Height = 121
        Caption = 'Normal deletion (Delete key/toolbar button)'
        TabOrder = 0
        object rbDelTrash: TRadioButton
          Left = 16
          Top = 24
          Width = 385
          Height = 17
          Caption = 'Move messages to the Trash folder'
          TabOrder = 0
          OnClick = rbDelTrashClick
        end
        object rbDelMark: TRadioButton
          Left = 16
          Top = 44
          Width = 385
          Height = 17
          Caption = 'Mark as deleted, do not use the Trash folder'
          TabOrder = 1
          OnClick = rbDelTrashClick
        end
        object rbDelFolder: TRadioButton
          Left = 16
          Top = 64
          Width = 393
          Height = 17
          Caption = 'Move to the specified folder'
          TabOrder = 2
          OnClick = rbDelTrashClick
        end
        object eDelFolder: TEdit
          Left = 32
          Top = 88
          Width = 273
          Height = 21
          TabOrder = 3
        end
        object bDelFolder: TButton
          Left = 312
          Top = 86
          Width = 113
          Height = 25
          Caption = 'Browse'
          TabOrder = 4
          OnClick = bDelFolderClick
        end
      end
      object gbAltDel: TGroupBox
        Left = 16
        Top = 160
        Width = 433
        Height = 141
        Caption = 'Alternative deletion (Shift + Delete key/toolbar button)'
        TabOrder = 1
        object rbAltDelTrash: TRadioButton
          Left = 16
          Top = 24
          Width = 385
          Height = 17
          Caption = 'Move messages to the Trash folder'
          TabOrder = 0
          OnClick = rbAltDelFolderClick
        end
        object rbAltDelMark: TRadioButton
          Left = 16
          Top = 44
          Width = 385
          Height = 17
          Caption = 'Mark as deleted, do not use the Trash folder'
          TabOrder = 1
          OnClick = rbAltDelFolderClick
        end
        object rbAltDelFolder: TRadioButton
          Left = 16
          Top = 64
          Width = 393
          Height = 17
          Caption = 'Move to the specified folder'
          TabOrder = 2
          OnClick = rbAltDelFolderClick
        end
        object eAltDelFolder: TEdit
          Left = 32
          Top = 88
          Width = 273
          Height = 21
          TabOrder = 3
        end
        object bAltDelFolder: TButton
          Left = 312
          Top = 86
          Width = 113
          Height = 25
          Caption = 'Browse'
          TabOrder = 4
          OnClick = bAltDelFolderClick
        end
        object cbAltPurge: TCheckBox
          Left = 16
          Top = 116
          Width = 409
          Height = 17
          Caption = 'Use alternative deletion for purging this folder'
          TabOrder = 5
        end
      end
      object cbCompressEmpty: TCheckBox
        Left = 16
        Top = 312
        Width = 409
        Height = 17
        Caption = 'Compress emptied folder automatically'
        TabOrder = 2
      end
      object cbFolderDel: TCheckBox
        Left = 16
        Top = 8
        Width = 433
        Height = 17
        Caption = '&Use folder-specific deletion settings'
        TabOrder = 3
        OnClick = cbFolderDelClick
      end
    end
    object tsMemo: TTabSheet
      Caption = 'Memo'
      ImageIndex = 7
      object Label5: TLabel
        Left = 8
        Top = 8
        Width = 32
        Height = 13
        Caption = '&Memo:'
        FocusControl = eMemo
      end
      object eMemo: TMemo
        Left = 12
        Top = 24
        Width = 449
        Height = 313
        Lines.Strings = (
          '')
        ScrollBars = ssBoth
        TabOrder = 0
        WordWrap = False
      end
    end
  end
  object btnWatchBy: TButton
    Left = 12
    Top = 368
    Width = 169
    Height = 25
    Caption = 'Watched by...'
    TabOrder = 5
    Visible = False
    OnClick = btnWatchByClick
  end
  object btnSelFolders: TButton
    Left = 12
    Top = 404
    Width = 169
    Height = 25
    Hint = 'Select folders for filtering'
    Caption = '&Select folders'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 6
    OnClick = btnSelFoldersClick
  end
  object mPop: TPopupMenu
    Left = 84
    Top = 404
    object mmText: TMenuItem
      Caption = '&Text'
    end
    object mmSender: TMenuItem
      Caption = '&Sender info'
    end
    object mmRece: TMenuItem
      Caption = '&Recipient info'
    end
    object mmDef: TMenuItem
      Caption = '&Pre-defined fields'
    end
    object mmMisc: TMenuItem
      Caption = '&Miscellaneous'
    end
    object N1: TMenuItem
      Caption = '-'
    end
    object mtAttachFile: TMenuItem
      Caption = '&Attach a file...'
      ShortCut = 32801
      OnClick = mtAttachFileClick
    end
    object mtInclude: TMenuItem
      Tag = 1
      Caption = '&Include template file...'
      ShortCut = 32813
      OnClick = mtAttachFileClick
    end
    object mtPut: TMenuItem
      Tag = 2
      Caption = 'Put text file...'
      OnClick = mtAttachFileClick
    end
    object mtfCookie: TMenuItem
      Tag = 3
      Caption = '&Cookie from a file...'
      OnClick = mtAttachFileClick
    end
    object Popup1: TMenuItem
      Caption = 'Popup'
      ShortCut = 32889
      Visible = False
    end
    object N2: TMenuItem
      Caption = '-'
    end
    object mmCut: TMenuItem
      Caption = 'Cut'
      ShortCut = 16472
      OnClick = mmCutClick
    end
    object mmCopy: TMenuItem
      Caption = 'Copy'
      ShortCut = 16451
      OnClick = mmCopyClick
    end
    object mmPaste: TMenuItem
      Caption = 'Paste'
      ShortCut = 16470
      OnClick = mmPasteClick
    end
    object mmSelectAll: TMenuItem
      Caption = 'Select All'
      ShortCut = 16449
      OnClick = mmSelectAllClick
    end
  end
end